This forum is closed to new posts and
responses. The content has been migrated to the Digital Solutions Community. Please join us there for new content as well as this content. For customer support, please visit the official HCL customer support channels below:
~Nicole Ciskimarettu 5.Jan.04 04:21 PM a Web browser Domino ServerAll ReleasesAll Platforms
All greetings.
I have the program code:
================================================
CREATE CURSOR MyCursor (field1_name C(10), field2_name C(20))
oLotus=CREATEOBJECT("Lotus.NOTESSESSION")
oLotus.Initialize()
oLdtim=oLotus.createdatetime("2003/01/01 00:00 AM")
oDbase=oLotus.getdatabase("","File_name.nsf")
if vartype(oDbase)#"O"
=messagebox('Connection fall',16,'LotusNotes')
return
endif
oColl=oDbase.Search("Form='Type1'",oLdtim,0)
lnCnt=oColl.count
FOR gnDoc=1 TO lnCnt
oDoc=oColl.getNthDocument(gnDoc)
m.field1_value=oDoc.GetItemValue("notes_field1")
m.field2_value=oDoc.GetItemValue("notes_field2")
IF NOT EMPTY(m.field1_value)
n=n+1
INSERT INTO MyCursor VALUES (m.field1_value, m.field2_value)
IF n%1000=0
WAIT WINDOW ALLTRIM(STR(n)) nowait
ENDIF
ENDIF
ENDFOR
RELEASE olotus
BROWSE
===============================================
Why speed of sample of the data falls at the reference(manipulation) to a database? In a database of 30000 records, each subsequent 1000 records gets out more slowly previous, and this delay is essential.
Return to top
OLE automation (speed of data sampl... (~Nicole Ciskima... 5.Jan.04)
. . 
Print this page
